package cn.ges.redis;

import cn.ges.type.TypeHelper;
import lombok.extern.slf4j.Slf4j;
import org.springframework.data.redis.connection.StringRedisConnection;
import org.springframework.data.redis.core.RedisCallback;
import org.springframework.data.redis.core.RedisTemplate;
import org.springframework.lang.Nullable;
import org.springframework.util.CollectionUtils;

import java.math.BigDecimal;
import java.time.Duration;
import java.time.Instant;
import java.time.Month;
import java.util.List;
import java.util.Map;
import java.util.Optional;
import java.util.Set;
import java.util.concurrent.TimeUnit;

/**
 * redis 设置工具包
 *
 * @author gespent@163.com
 * @date 2018/12/21
 */
@Slf4j
public class RedisUtil {


    /**
     * 此处为static 是因为工具类方法均为static
     */
    public static RedisTemplate<Object, Object> redisTemplate;

    /**
     * 初始化方法
     */
    public static void initRedisUtil(RedisTemplate<Object, Object> redisTemplate) {
        RedisUtil.redisTemplate = redisTemplate;
    }

    public static void setRedisTemplate(RedisTemplate<Object, Object> redisTemplate) {
        RedisUtil.redisTemplate = redisTemplate;
    }

    public RedisUtil(RedisTemplate<Object, Object> redisTemplate) {
        RedisUtil.redisTemplate = redisTemplate;
        if (redisTemplate != null) {
            log.info("[RedisUtil] 加载完毕,不建议使用该种方法加载");
        } else {
            log.error("[RedisUtil] 注意! 不正常的加载!");
        }
    }

    /**
     * string 类型建 存储BigDecimal格式时 进行数据合并
     *
     * @param key          key
     * @param defaultValue 若key不存在 则初始化的值 确定key存在时可以为空
     * @param mergeValue   每次修改的值 若确定key不存在 可以为空
     * @param expire       若key不存在 初始化的过期时间 确定key存在时可以为空
     * @return 修改后的值 或者null
     */
    public static BigDecimal sBigDecimalMerge(Object key, @Nullable BigDecimal defaultValue, @Nullable BigDecimal mergeValue, @Nullable Integer expire) {
        if (RedisUtil.hasKey(key)) {
            final Object o = RedisUtil.get(key);
            final BigDecimal l = TypeHelper.number2BIgDecimal(o);
            if (l == null) {
                return null;
            } else {
                if (mergeValue == null) {
                    return null;
                } else {
                    final BigDecimal value = mergeValue.add(l);
                    if (RedisUtil.set(key, value, RedisUtil.getExpire(key))) {
                        return value;
                    } else {
                        return null;
                    }
                }

            }
        } else {
            if (expire != null && defaultValue != null) {
                if (RedisUtil.set(key, defaultValue, expire)) {
                    return defaultValue;
                } else {
                    return null;
                }
            } else {
                return null;
            }

        }
    }

    /**
     * string 类型建 存储数字格式时 进行数据合并
     *
     * @param key          key
     * @param defaultValue 若key不存在 则初始化的值 确定key存在时可以为空
     * @param mergeValue   每次修改的值 若确定key不存在 可以为空
     * @param expire       若key不存在 初始化的过期时间 确定key存在时可以为空
     * @return 修改后的值 或者null
     */
    public static Long sNumberMerge(Object key, @Nullable Integer defaultValue, @Nullable Integer mergeValue, @Nullable Integer expire) {
        if (RedisUtil.hasKey(key)) {
            final Object o = RedisUtil.get(key);
            final Long l = TypeHelper.number2Long(o);
            if (l == null) {
                return null;
            } else {
                if (mergeValue == null) {
                    return null;
                } else {
                    final long value = mergeValue + l;
                    if (RedisUtil.set(key, value, RedisUtil.getExpire(key))) {
                        return value;
                    } else {
                        return null;
                    }
                }

            }
        } else {
            if (expire != null && defaultValue != null) {
                if (RedisUtil.set(key, defaultValue, expire)) {
                    return defaultValue.longValue();
                } else {
                    return null;
                }
            } else {
                return null;
            }

        }
    }

    /**
     * 放入普通缓存(String) 并设置过期时间
     *
     * @param key   键
     * @param value 值
     * @param time  秒  如果time小于等于0 将设置无限期
     * @return 成功与否
     */
    public static boolean set(Object key, Object value, long time) {
        try {
            if (time > 0) {
                redisTemplate.opsForValue().set(key, value, time, TimeUnit.SECONDS);
            } else {
                set(key, value);
            }
            return true;
        } catch (Exception e) {
            e.printStackTrace();
            return false;
        }
    }

    /**
     * 递减
     *
     * @param delta 递减因子 需要减少多少 需要>0
     * @return 返回0表示 递减因子<=0 或者其他错误
     */
    public static long decr(Object key, long delta) {
        if (delta < 0) {
            return 0;
        }
        return Optional.ofNullable(redisTemplate.opsForValue().increment(key, -delta)).orElse(0L);
    }

    /**
     * 递增
     *
     * @param delta 递增数 需要增加多少 需要>0
     * @return 返回0表示 递增因子<=0 或者其他错误
     */
    public static long incr(Object key, long delta) {
        if (delta < 0) {
            return 0;
        }
        return Optional.ofNullable(redisTemplate.opsForValue().increment(key, delta)).orElse(0L);
    }


    /**
     * 普通缓存放入
     *
     * @param key   键
     * @param value 值
     * @return false表示存储失败
     */
    public static boolean set(Object key, Object value) {
        try {
            redisTemplate.opsForValue().set(key, value);
            return true;
        } catch (Exception e) {
            e.printStackTrace();
            return false;
        }
    }

    /**
     * 获得普通缓存
     *
     * @param key 键
     * @return null或者值
     */
    public static Object get(Object key) {
        return key == null ? null : redisTemplate.opsForValue().get(key);
    }


    /**
     * 删除缓存
     *
     * @param key 删除缓存的键
     * @return 删除键的个数
     */
    @SuppressWarnings("unchecked")
    public static int del(Object... key) {
        if (key != null && key.length > 0) {
            if (key.length == 1) {
                return Optional.ofNullable(redisTemplate.delete(key[0])).map(t -> 1).orElse(0);
            } else {
                return Optional.ofNullable(redisTemplate.delete(CollectionUtils.arrayToList(key))).map(Long::intValue).orElse(0);
            }
        }
        return 0;
    }


    /**
     * 删除大键 应该使用该方法
     * 该命令和DEL十分相似：删除指定的key(s),若key不存在则该key被跳过。
     * 但是，相比DEL会产生阻塞，该命令会在另一个线程中回收内存，因此它是非阻塞的。
     * 仅将keys从keyspace元数据中删除，真正的删除会在后续异步操作。
     *
     * @param key 异步删除缓存的键
     * @return unlink键的个数
     */
    @SuppressWarnings("unchecked")
    public static int unlink(Object... key) {
        if (key != null && key.length > 0) {
            if (key.length == 1) {
                return Optional.ofNullable(redisTemplate.unlink(key[0])).map(t -> 1).orElse(0);
            } else {
                return Optional.ofNullable(redisTemplate.unlink(CollectionUtils.arrayToList(key))).map(Long::intValue).orElse(0);
            }
        }
        return 0;
    }

    /**
     * 当且仅当 key 不存在，将 key 的值设为 value；
     * 若给定的 key 已经存在，则不做任何动作。
     *
     * @param timeOut 锁过期时间 单位毫秒
     * @return 成功与否
     */
    public static boolean setIfNotExists(Object key, Object value, long timeOut) {
        Duration duration = Duration.ofSeconds(timeOut / 1000);
        return Optional.ofNullable(redisTemplate.opsForValue().setIfAbsent(key, value, duration)).orElse(false);
    }

    /**
     * 将给定 key 的值设为 value ，并返回 key 的旧值,
     * 当 key 没有旧值时 既key 不存在时，返回 null
     */
    public static Object getSet(Object key, Object value) {
        return redisTemplate.opsForValue().getAndSet(key, value);
    }

    /**
     * 判断一个Key是否存在
     *
     * @param key 键
     * @return 存在返回true反之返回false
     */
    public static boolean hasKey(Object key) {
        try {
            return Optional.ofNullable(redisTemplate.hasKey(key)).orElse(false);
        } catch (Exception e) {
            e.printStackTrace();
            return false;
        }
    }

    /**
     * 根据key获取过期时间
     *
     * @param key 键
     * @return 时间(秒) 返回-1表示输入了一个空key 或者获取时间失败
     */
    public static long getExpire(Object key) {
        if (key != null) {
            return Optional.ofNullable(redisTemplate.getExpire(key, TimeUnit.SECONDS)).orElse(-1L);
        } else {
            return -1;
        }
    }

    /**
     * 指定缓存失效时间
     *
     * @param key  键
     * @param time 时间/秒
     * @return 设置成功与否
     */
    public static boolean expire(Object key, long time) {
        try {
            if (time > 0) {
                redisTemplate.expire(key, time, TimeUnit.SECONDS);
            }
            return true;
        } catch (Exception e) {
            e.printStackTrace();
            return false;
        }
    }
    // ------------------对map操作---------------

    /**
     * HashGet
     *
     * @param key  键
     * @param item 项
     * @return 值
     */
    public static Object hget(Object key, Object item) {
        return redisTemplate.opsForHash().get(key, item);
    }

    /**
     * 获取hashKey对应的所有键值
     *
     * @param key 键
     * @return 对应的多个键值
     */
    public static Map<Object, Object> hmget(Object key) {
        return redisTemplate.opsForHash().entries(key);
    }

    /**
     * HashSet
     *
     * @param key 键
     * @param map 对应多个键值
     * @return true 成功 false 失败
     */
    public static boolean hmset(Object key, Map<Object, Object> map) {
        try {
            redisTemplate.opsForHash().putAll(key, map);
            return true;
        } catch (Exception e) {
            e.printStackTrace();
            return false;
        }
    }

    /**
     * HashSet 并设置时间
     *
     * @param key  键
     * @param map  对应多个键值
     * @param time 时间(秒)
     * @return true成功 false失败
     */
    public static boolean hmset(Object key, Map<Object, Object> map, long time) {
        try {
            redisTemplate.opsForHash().putAll(key, map);
            if (time > 0) {
                expire(key, time);
            }
            return true;
        } catch (Exception e) {
            e.printStackTrace();
            return false;
        }
    }

    /**
     * 向一张hash表中放入数据,如果不存在将创建
     *
     * @param key   键
     * @param item  项
     * @param value 值
     * @return true 成功 false失败
     */
    public static boolean hset(Object key, Object item, Object value) {
        try {
            redisTemplate.opsForHash().put(key, item, value);
            return true;
        } catch (Exception e) {
            e.printStackTrace();
            return false;
        }
    }

    /**
     * 获取一张Hash表itme个数
     *
     * @param key 键
     */
    public static long hsize(Object key) {
        return Optional.ofNullable(redisTemplate.opsForHash().size(key)).orElse(0L);
    }


    /**
     * 向一张hash表中放入数据,如果不存在将创建
     *
     * @param key   键
     * @param item  项
     * @param value 值
     * @param time  时间(秒) 注意:如果已存在的hash表有时间,这里将会替换原有的时间
     * @return true 成功 false失败
     */
    public static boolean hset(Object key, Object item, Object value, long time) {
        try {
            redisTemplate.opsForHash().put(key, item, value);
            if (time > 0) {
                expire(key, time);
            }
            return true;
        } catch (Exception e) {
            e.printStackTrace();
            return false;
        }
    }

    /**
     * 删除hash表中的值
     *
     * @param key  键 不能为null
     * @param item 项 可以使多个 不能为null
     */
    public static void hdel(Object key, Object... item) {
        redisTemplate.opsForHash().delete(key, item);
    }

    /**
     * 判断hash表中是否有该项的值
     *
     * @param key  键 不能为null
     * @param item 项 不能为null
     * @return true 存在 false不存在
     */
    public static boolean hHasKey(Object key, String item) {
        return redisTemplate.opsForHash().hasKey(key, item);
    }

    /**
     * hash递增 如果不存在,就会创建一个 并把新增后的值返回
     *
     * @param key  键
     * @param item 项
     * @param by   要增加几(大于0)
     */
    public double hincr(Object key, String item, double by) {
        return redisTemplate.opsForHash().increment(key, item, by);
    }

    /**
     * hash递减
     *
     * @param key  键
     * @param item 项
     * @param by   要减少记(小于0)
     */
    public double hdecr(Object key, String item, double by) {
        return redisTemplate.opsForHash().increment(key, item, -by);
    }

    // ============================set=============================

    /**
     * 根据key获取Set中的所有值
     *
     * @param key 键
     */
    public Set<Object> sGet(Object key) {
        try {
            return redisTemplate.opsForSet().members(key);
        } catch (Exception e) {
            e.printStackTrace();
            return null;
        }
    }

    /**
     * 根据value从一个set中查询,是否存在
     *
     * @param key   键
     * @param value 值
     * @return true 存在 false不存在
     */
    public static boolean sHasKey(Object key, Object value) {
        try {
            return Optional.ofNullable(redisTemplate.opsForSet().isMember(key, value)).orElse(false);
        } catch (Exception e) {
            e.printStackTrace();
            return false;
        }
    }

    /**
     * 将数据放入set缓存
     *
     * @param key    键
     * @param values 值 可以是多个
     * @return 成功个数
     */
    public static long sSet(Object key, Object... values) {
        try {
            return Optional.ofNullable(redisTemplate.opsForSet().add(key, values)).orElse(0L);

        } catch (Exception e) {
            e.printStackTrace();
            return 0;
        }
    }

    /**
     * 将set数据放入缓存
     *
     * @param key    键
     * @param time   时间(秒)
     * @param values 值 可以是多个
     * @return 成功个数
     */
    public static long sSetAndTime(Object key, long time, Object... values) {
        try {
            Long count = redisTemplate.opsForSet().add(key, values);
            if (time > 0) {
                expire(key, time);
            }
            return Optional.ofNullable(count).orElse(0L);
        } catch (Exception e) {
            e.printStackTrace();
            return 0;
        }
    }

    /**
     * 获取set缓存的长度
     *
     * @param key 键
     */
    public static long sGetSetSize(Object key) {
        try {
            return Optional.ofNullable(redisTemplate.opsForSet().size(key)).orElse(0L);
        } catch (Exception e) {
            e.printStackTrace();
            return 0;
        }
    }

    /**
     * 求两个set的并集 并将结果存储于第三个set(该集合可以是前两个set)
     *
     * @param key      set1
     * @param otherKey set2
     * @param destKey  存储结果集合
     * @return 并集数
     */
    public static long intersectAndStore(Object key, Object otherKey, Object destKey) {
        try {
            return Optional.ofNullable(redisTemplate.opsForSet().intersectAndStore(key, otherKey, destKey)).orElse(0L);
        } catch (Exception e) {
            e.printStackTrace();
            return 0;
        }
    }

    /**
     * 求两个set的并集 并将结果存储于 set1
     *
     * @param key      set1
     * @param otherKey set2
     * @return 并集数
     */
    public static long intersectAndStore(Object key, Object otherKey) {
        return RedisUtil.intersectAndStore(key, otherKey, key);
    }


    /**
     * 移除值为value的set
     *
     * @param key    键
     * @param values 值 可以是多个
     * @return 移除的个数
     */
    public static long setRemove(Object key, Object... values) {
        try {
            Long count = redisTemplate.opsForSet().remove(key, values);
            return Optional.ofNullable(count).orElse(0L);
        } catch (Exception e) {
            e.printStackTrace();
            return 0;
        }
    }
    // ===============================zset==================================
    // zset score 最多只能16位

    /**
     * z 排名加权
     * @param score 待加密分数 不能有小数 最多8位
     * @param bit 精确位数 月=8 日=7
     * @return 加密后带权分数
     */
    public static double zEncrypt(double score, Integer bit) {
        double pow = Math.pow(10, bit);
        return (score * pow) + ((Instant.now().getEpochSecond()) % pow);
    }

    public static double zDeCode(double score, Integer bit) {
        return (int)(score / (Math.pow(10, bit)));
    }

    public static void zAdd(String key, String value, double score) {
        redisTemplate.opsForZSet().add(key, value, score);
    }

    /**
     * 为zSet增加一个item 并删除超过限制的多余项
     */
    public static void zAddAndRemove(String key, String value, double score, long limit) {
        redisTemplate.opsForZSet().add(key, value, score);
        while (RedisUtil.zSize(key) > limit) {
            RedisUtil.zRemoveRange(key, 0, 1);
        }
    }

    public static void zRemove(String key, String value) {
        redisTemplate.opsForZSet().remove(key, value);
    }

    /**
     * 移除指定索引位置的成员，其中有序集成员按分数值递增(从小到大)顺序排列
     */
    public static void zRemoveRange(String key, long start, long end) {
        redisTemplate.opsForZSet().removeRange(key, start, end);
    }


    /**
     * 获取value对应的score
     */
    public static Double zGetScore(String key, String value) {
        return redisTemplate.opsForZSet().score(key, value);
    }

    /**
     * 获得value对应的排名
     */
    public static Long zRank(String key, String value) {
        return redisTemplate.opsForZSet().rank(key, value);
    }

    public static Long reverseRank(String key, String value) {
        return redisTemplate.opsForZSet().reverseRank(key, value);
    }

    /**
     * 获得set长度
     */
    public static Long zSize(String key) {
        return redisTemplate.opsForZSet().zCard(key);
    }

    /**
     * 查询集合中指定顺序的值， 0 -1 表示获取全部的集合内容  zrange
     * 返回有序的集合 score小的在前面
     */
    public static Set<Object> zRange(String key, int start, int end) {
        return redisTemplate.opsForZSet().range(key, start, end);
    }

    /**
     * 查询集合中指定顺序的值， 0 -1 表示获取全部的集合内容  zrange
     * 返回有序的集合 score大的在前面
     */
    public static Set<Object> zReverseRange(String key, int start, int end) {
        return redisTemplate.opsForZSet().reverseRange(key, start, end);
    }


    /**
     * 查询集合中指定顺序的值和score，0, -1 表示获取全部的集合内容
     */
    public static Object zRangeWithScore(String key, int start, int end) {
        return redisTemplate.opsForZSet().rangeWithScores(key, start, end);
    }

    /**
     * 查询集合中指定顺序的值  zrevrange
     * <p>
     * 返回有序的集合中，score大的在前面
     */
    public static Set<Object> zRevRange(String key, int start, int end) {
        return redisTemplate.opsForZSet().reverseRange(key, start, end);
    }


    /**
     * 根据score的值，来获取满足条件的集合  zrangebyscore
     */
    public static Set<Object> zSortRange(String key, int min, int max) {
        return redisTemplate.opsForZSet().rangeByScore(key, min, max);
    }


    // ===============================list=================================

    /**
     * 获取list缓存的内容
     *
     * @param key   键
     * @param start 开始
     * @param end   结束 0 到 -1代表所有值
     */
    public static List<Object> lGet(Object key, long start, long end) {
        try {
            return redisTemplate.opsForList().range(key, start, end);
        } catch (Exception e) {
            e.printStackTrace();
            return null;
        }
    }

    /**
     * 从list的头部 压入数据。如果不存在该key，则会创建该key。
     *
     * @param key   键
     * @param value 值
     * @return 修改个数
     */
    public static Long listLeftPushAndTime(Object key, Object value, long time) {
        try {
            final Long aLong = redisTemplate.opsForList().leftPush(key, value);
            if (time > 0) {
                expire(key, time);
            }

            return aLong;
        } catch (Exception e) {
            e.printStackTrace();
            return null;
        }
    }

    /**
     * 弹出list头部的元素 如果list不存在数据，则会阻塞住 最长阻塞时间就是设置的超时时间
     *
     * @param key  键
     * @param time 超时值 单位秒
     * @return 修改的值
     */
    public static Object listLeftPop(Object key, long time) {
        try {
            return redisTemplate.opsForList().leftPop(key, time, TimeUnit.SECONDS);
        } catch (Exception e) {
            e.printStackTrace();
            return null;
        }
    }

    /**
     * 弹出list尾部的元素 如果list不存在数据，则会阻塞住 最长阻塞时间就是设置的超时时间
     *
     * @param key  键
     * @param time 超时值 单位秒
     * @return 修改的值
     */
    public static Object listRightPop(Object key, long time) {
        try {
            return redisTemplate.opsForList().rightPop(key, time, TimeUnit.SECONDS);
        } catch (Exception e) {
            e.printStackTrace();
            return null;
        }
    }


    /**
     * 获取list缓存的长度
     *
     * @param key 键
     */
    public static long lGetListSize(Object key) {
        try {
            Long count = redisTemplate.opsForList().size(key);
            return Optional.ofNullable(count).orElse(0L);
        } catch (Exception e) {
            e.printStackTrace();
            return 0;
        }
    }

    /**
     * 通过索引 获取list中的值
     *
     * @param key   键
     * @param index 索引 index>=0时， 0 表头，1 第二个元素，依次类推；index<0时，-1，表尾，-2倒数第二个元素，依次类推
     */
    public static Object lGetIndex(Object key, long index) {
        try {
            return redisTemplate.opsForList().index(key, index);
        } catch (Exception e) {
            e.printStackTrace();
            return null;
        }
    }

    /**
     * 将list放入缓存
     *
     * @param key   键
     * @param value 值
     */
    public static boolean lSet(Object key, Object value) {
        try {
            redisTemplate.opsForList().rightPush(key, value);
            return true;
        } catch (Exception e) {
            e.printStackTrace();
            return false;
        }
    }

    /**
     * 将list放入缓存并设置时间
     *
     * @param key   键
     * @param value 值
     * @param time  时间(秒)
     */
    public static boolean lSet(Object key, Object value, long time) {
        try {
            redisTemplate.opsForList().rightPush(key, value);
            if (time > 0) {
                expire(key, time);
            }
            return true;
        } catch (Exception e) {
            e.printStackTrace();
            return false;
        }
    }

    /**
     * 将list放入缓存
     *
     * @param key   键
     * @param value 值
     */
    public static boolean lSet(Object key, List<Object> value) {
        try {
            redisTemplate.opsForList().rightPushAll(key, value);
            return true;
        } catch (Exception e) {
            e.printStackTrace();
            return false;
        }
    }

    /**
     * 将list放入缓存
     *
     * @param key   键
     * @param value 值
     * @param time  时间(秒)
     */
    public static boolean lSet(Object key, List<Object> value, long time) {
        try {
            redisTemplate.opsForList().rightPushAll(key, value);
            if (time > 0) {
                expire(key, time);
            }
            return true;
        } catch (Exception e) {
            e.printStackTrace();
            return false;
        }
    }

    /**
     * 根据索引修改list中的某条数据
     *
     * @param key   键
     * @param index 索引
     * @param value 值
     */
    public boolean lUpdateIndex(Object key, long index, Object value) {
        try {
            redisTemplate.opsForList().set(key, index, value);
            return true;
        } catch (Exception e) {
            e.printStackTrace();
            return false;
        }
    }

    /**
     * 移除N个值为value
     *
     * @param key   键
     * @param count 移除多少个
     * @param value 值
     * @return 移除的个数
     */
    public long lRemove(Object key, long count, Object value) {
        try {
            Long remove = redisTemplate.opsForList().remove(key, count, value);
            return Optional.ofNullable(remove).orElse(0L);
        } catch (Exception e) {
            e.printStackTrace();
            return 0;
        }
    }

    public static List<Object> pipelinedStringGet(String... keys) {
        return redisTemplate.executePipelined((RedisCallback<Object>) connection -> {
            StringRedisConnection conn = (StringRedisConnection) connection;
            for (String key : keys) {
                conn.get(key);
            }
            return null;
        });
    }
}

